/ Erect Magazine 6 / Erect Magazine 6.iso / mac / PhotoBr3 / PhotoBr3.rsrc / VWFI_1024

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 10 03 68 8d 08 | 00 00 00 08 00 00 00 00 |.....h..|........|
|00000010| 00 07 00 00 00 00 00 00 | 02 ee 00 00 03 12 00 00 |........|........|
|00000020| 03 24 00 00 03 24 00 00 | 03 26 00 00 03 26 00 00 |.$...$..|.&...&..|
|00000030| 03 26 6f 6e 20 53 74 61 | 72 74 4d 6f 76 69 65 0d |.&on Sta|rtMovie.|
|00000040| 20 20 20 20 47 6c 6f 62 | 61 6c 20 43 6f 6e 66 69 |    Glob|al Confi|
|00000050| 67 5f 47 0d 20 20 20 20 | 2d 2d 70 75 74 20 22 30 |g_G.    |--put "0|
|00000060| 2c 31 2c 35 22 20 69 6e | 74 6f 20 43 6f 6e 66 69 |,1,5" in|to Confi|
|00000070| 67 5f 47 0d 65 6e 64 0d | 2d 2d 0d 6f 6e 20 52 65 |g_G.end.|--.on Re|
|00000080| 61 64 50 69 63 74 0d 20 | 20 20 20 47 6c 6f 62 61 |adPict. |   Globa|
|00000090| 6c 20 50 68 6f 74 6f 4e | 6f 5f 47 0d 20 20 20 20 |l PhotoN|o_G.    |
|000000a0| 70 75 74 20 70 61 74 68 | 4e 61 6d 65 28 29 20 26 |put path|Name() &|
|000000b0| 20 22 50 48 4f 54 4f 3a | 50 49 43 54 3a 46 45 52 | "PHOTO:|PICT:FER|
|000000c0| 41 3a 22 20 26 20 50 68 | 6f 74 6f 4e 6f 5f 47 20 |A:" & Ph|otoNo_G |
|000000d0| 26 20 22 2e 50 49 43 22 | 20 69 6e 74 6f 20 66 4e |& ".PIC"| into fN|
|000000e0| 61 6d 65 0d 20 20 20 20 | 70 75 74 20 46 69 6c 65 |ame.    |put File|
|000000f0| 49 4f 28 6d 4e 65 77 2c | 20 22 72 65 61 64 22 2c |IO(mNew,| "read",|
|00000100| 66 4e 61 6d 65 29 20 69 | 6e 74 6f 20 6d 79 50 0d |fName) i|nto myP.|
|00000110| 20 20 20 20 69 66 20 6f | 62 6a 65 63 74 50 28 6d |    if o|bjectP(m|
|00000120| 79 50 29 20 74 68 65 6e | 0d 20 20 20 20 20 20 20 |yP) then|.       |
|00000130| 20 73 65 74 20 74 68 65 | 20 70 69 63 74 75 72 65 | set the| picture|
|00000140| 20 6f 66 20 63 61 73 74 | 20 22 50 69 63 74 43 61 | of cast| "PictCa|
|00000150| 73 74 22 20 3d 20 6d 79 | 50 28 6d 52 65 61 64 50 |st" = my|P(mReadP|
|00000160| 49 43 54 29 0d 20 20 20 | 20 20 20 20 20 6d 79 50 |ICT).   |     myP|
|00000170| 28 6d 44 69 73 70 6f 73 | 65 29 0d 20 20 20 20 65 |(mDispos|e).    e|
|00000180| 6c 73 65 0d 20 20 20 20 | 20 20 20 20 62 65 65 70 |lse.    |    beep|
|00000190| 20 31 0d 20 20 20 20 65 | 6e 64 20 69 66 20 0d 65 | 1.    e|nd if .e|
|000001a0| 6e 64 0d 2d 2d 0d 6f 6e | 20 52 65 61 64 43 61 73 |nd.--.on| ReadCas|
|000001b0| 74 0d 20 20 20 20 73 65 | 74 20 74 68 65 20 63 61 |t.    se|t the ca|
|000001c0| 73 74 4e 75 6d 20 6f 66 | 20 73 70 72 69 74 65 20 |stNum of| sprite |
|000001d0| 32 20 3d 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |2 = the |number o|
|000001e0| 66 20 63 61 73 74 20 22 | 53 74 61 67 65 42 61 63 |f cast "|StageBac|
|000001f0| 6b 22 0d 20 20 20 20 75 | 70 64 61 74 65 73 74 61 |k".    u|pdatesta|
|00000200| 67 65 0d 20 20 20 20 2d | 2d 0d 20 20 20 20 47 6c |ge.    -|-.    Gl|
|00000210| 6f 62 61 6c 20 50 68 6f | 74 6f 4e 6f 5f 47 2c 50 |obal Pho|toNo_G,P|
|00000220| 68 6f 74 6f 5f 47 0d 20 | 20 20 20 70 75 74 20 22 |hoto_G. |   put "|
|00000230| 50 68 6f 74 6f 50 61 6c | 22 26 50 68 6f 74 6f 4e |PhotoPal|"&PhotoN|
|00000240| 6f 5f 47 20 69 6e 74 6f | 20 50 61 6c 5f 57 0d 20 |o_G into| Pal_W. |
|00000250| 20 20 20 70 75 70 70 65 | 74 50 61 6c 65 74 74 65 |   puppe|tPalette|
|00000260| 20 50 61 6c 5f 57 2c 36 | 30 0d 20 20 20 20 75 70 | Pal_W,6|0.    up|
|00000270| 64 61 74 65 73 74 61 67 | 65 0d 20 20 20 20 2d 2d |datestag|e.    --|
|00000280| 0d 20 20 20 20 70 75 74 | 20 50 68 6f 74 6f 4e 6f |.    put| PhotoNo|
|00000290| 5f 47 2b 31 32 38 20 69 | 6e 74 6f 20 50 68 6f 74 |_G+128 i|nto Phot|
|000002a0| 6f 5f 57 0d 20 20 20 20 | 70 75 74 20 74 68 65 20 |o_W.    |put the |
|000002b0| 6e 61 6d 65 20 6f 66 20 | 63 61 73 74 20 50 68 6f |name of |cast Pho|
|000002c0| 74 6f 5f 57 20 69 6e 74 | 6f 20 6e 61 6d 65 5f 57 |to_W int|o name_W|
|000002d0| 0d 20 20 20 20 73 65 74 | 20 74 68 65 20 63 61 73 |.    set| the cas|
|000002e0| 74 4e 75 6d 20 6f 66 20 | 73 70 72 69 74 65 20 32 |tNum of |sprite 2|
|000002f0| 20 3d 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 | = the n|umber of|
|00000300| 20 63 61 73 74 20 6e 61 | 6d 65 5f 57 0d 20 20 20 | cast na|me_W.   |
|00000310| 20 75 70 64 61 74 65 73 | 74 61 67 65 0d 65 6e 64 | updates|tage.end|
|00000320| 23 51 75 61 64 72 61 39 | 35 30 20 2d 20 54 6f 74 |#Quadra9|50 - Tot|
|00000330| 61 6c 20 4d 65 64 69 61 | 20 41 67 65 6e 63 79 2c |al Media| Agency,|
|00000340| 49 6e 63 2e 11 54 4d 41 | 20 2d 20 50 4d 38 31 30 |Inc..TMA| - PM810|
|00000350| 30 2f 38 30 41 56 00 00 |                         |0/80AV..|        |
+--------+-------------------------+-------------------------+--------+--------+